home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 2007 November / PCWNOV07.iso / Software / Trial / AceHTML Pro 6.6 / acehtml6pro.exe / scriptdef / Power Equivalents.sd < prev    next >
Encoding:
INI File  |  2006-09-13  |  6.4 KB  |  259 lines
  1. [SUBJECT]
  2. Description=Converts bewteen different units of power
  3. ImageIndex=-1
  4. Folder=Mathematics
  5.  
  6. [BODY_TEXT]
  7. ;<!-- Cut-N-Paste JavaScript from ISN Toolbox 
  8. ;Copyright 1996, Infohiway Server Network.  Restricted use is hereby
  9. ;granted (both personal and commercial use OK so long as this code is 
  10. ;not *directly* sold), providing this notice is buried somewhere deep
  11. ;in your HTML document.  A link to http://www.infohiway.com is always 
  12. ;appreciated, but is absolutely and positively not necessary. :-) -->
  13. ;
  14. ;<script language="JavaScript">
  15. ;
  16. ;<!-- Hide JavaScript from Java-Impaired Browsers
  17. ;
  18. ;function initArray() {
  19. ;
  20. ;  this.length = initArray.arguments.length;
  21. ;
  22. ;  for (var i = 0; i < this.length; i++) {
  23. ;
  24. ;    this[i] = initArray.arguments[i];
  25. ;
  26. ;    }
  27. ;
  28. ;  }
  29. ;
  30. ;/* Please don't ask about this work-around. It works... We're sure arrays
  31. ;
  32. ;    will be better supported soon. */
  33. ;
  34. ;var isn11 = new initArray("4b","5b","8b","8b");
  35. ;
  36. ;isn11[0] = "~01~10.7457~21.014~30.7604~476.04~5550~60.1781~70.7068~8";
  37. ;
  38. ;isn11[1] = "~01.3410~11~21.360~31.020~4102.0~5737.6~60.2388~70.9478~8";
  39. ;
  40. ;isn11[2] = "~00.9863~10.7355~21~30.75~475~5542.5~60.1757~70.6971~8";
  41. ;
  42. ;isn11[3] = "~01.315~10.9807~21.333~31~4100~5723.3~60.2342~70.9295~8";
  43. ;
  44. ;isn11[4] = "~00.01315~10.009807~20.01333~30.01~41~57.233~60.002342~70.009295~8";
  45. ;
  46. ;isn11[5] = "~00.00181818~10.001356~20.00184~30.00138~40.1383~51~60.0003238~70.001285~8";
  47. ;
  48. ;isn11[6] = "~05.615~14.187~25.692~34.269~4426.9~53088~61~73.968~8";
  49. ;
  50. ;isn11[7] = "~01.415~11.055~21.434~31.076~4107.6~5778.2~60.2520~71~8";
  51. ;
  52. ;
  53. ;
  54. ;
  55. ;
  56. ;function powerCon() {
  57. ;
  58. ;  // First, get the variables checked by the user
  59. ;
  60. ;  for (var i = 0; i < 8; i++) {
  61. ;
  62. ;    if (document.isnform11.poweri[i].checked) {
  63. ;
  64. ;      powi = i;
  65. ;
  66. ;      powinm = document.isnform11.poweri[i].value;
  67. ;
  68. ;      }
  69. ;
  70. ;    }
  71. ;
  72. ;  for (var i = 0; i < 8; i++) {
  73. ;
  74. ;    if (document.isnform11.powero[i].checked) {
  75. ;
  76. ;      powo = i;
  77. ;
  78. ;      powonm = document.isnform11.powero[i].value;
  79. ;
  80. ;      }
  81. ;
  82. ;    }
  83. ;
  84. ;  // Now grab the number input by user and parse to be sure numeric
  85. ;
  86. ;  useri = document.isnform11.powerin.value;
  87. ;
  88. ;  mulstr = isn11[powi];
  89. ;
  90. ;  picker = "~" + powo;
  91. ;
  92. ;  ps = mulstr.indexOf(picker);
  93. ;
  94. ;  powo++;
  95. ;
  96. ;  picker = "~" + powo;
  97. ;
  98. ;   ps1 = mulstr.indexOf(picker);
  99. ;
  100. ;  mulstr = mulstr.substring((ps + 2),ps1);
  101. ;
  102. ;  ps = (useri * mulstr);
  103. ;
  104. ;  picker = "";
  105. ;
  106. ;  picker += ps;
  107. ;
  108. ;  ps1 = picker.indexOf(".");
  109. ;
  110. ;  if (ps1 > -1) {
  111. ;
  112. ;    // Correct for binary/floating point conversion error
  113. ;
  114. ;    ps = ps + .000001;
  115. ;
  116. ;    picker = "";
  117. ;
  118. ;    picker += ps;
  119. ;
  120. ;    ps2 = picker.indexOf("e");
  121. ;
  122. ;    if (ps2 < 0) {
  123. ;
  124. ;      picker = picker.substring(0,(ps1 + 6));
  125. ;
  126. ;      }
  127. ;
  128. ;    if (ps2 == 0 || ps2 > 0) {
  129. ;
  130. ;      ps3 = picker.indexOf("00000");
  131. ;
  132. ;      if (ps3 > 0) {
  133. ;
  134. ;        picker = picker.substring(0,ps3 + 1) + picker.substring(ps2,picker.length);
  135. ;
  136. ;        }
  137. ;
  138. ;      }
  139. ;
  140. ;    }
  141. ;
  142. ;  picker = useri + " " + powinm + " = " + picker + " " + powonm;
  143. ;
  144. ;  document.isnform11.powerout.value = picker;
  145. ;
  146. ;  }
  147. ;
  148. ;// End Hiding -->
  149. ;
  150. ;
  151. ;
  152. ;</script>
  153. ;<form name="isnform11">
  154. ;<table border="1" width="486" summary="">
  155. ;
  156. ;<tr><td colspan="9" align="center"><font
  157. ;
  158. ;color="blue"><b>`Caption`</b></font></td></tr>
  159. ;
  160. ;<tr><td colspan="9" valign="top"><font size="1"><B>Type the number
  161. ;
  162. ;you wish converted here: </B>
  163. ;
  164. ;<input type="text" name="powerin" size="30" value=""
  165. ;
  166. ;onChange="powerCon();"><br><b>Then click radio buttons for desired
  167. ;
  168. ;conversion:</font></B></td></tr>
  169. ;
  170. ;<tr><td align="center"><font color="red" size="1"><b>From:</b></font></td>
  171. ;
  172. ;<td align="center" valign="top"><font size="1">Hp<br><input type="radio"
  173. ;
  174. ;name="poweri" value="Hp" checked onClick = ""></font></TD>
  175. ;
  176. ;<td align="center" valign="top"><font size="1">Metric hp<br><input
  177. ;
  178. ;type="radio" name="poweri" value="Metric hp" onClick = ""></font></TD>
  179. ;
  180. ;<td align="center" valign="top"><font size="1">Kw<br><input type="radio"
  181. ;
  182. ;name="poweri" value="Kw" onClick = ""></font></TD>
  183. ;
  184. ;<td align="center" valign="top"><font size="1">Poncelets<br><input
  185. ;
  186. ;type="radio" name="poweri" value="Poncelets" onClick = ""></font></TD>
  187. ;
  188. ;<td align="center" valign="top"><font size="1">Kg-m/sec<br><input
  189. ;
  190. ;type="radio" name="poweri" value="Kg-m/sec" onClick = ""></font></TD>
  191. ;
  192. ;<td align="center" valign="top"><font size="1">Ft-lb/sec<br><input
  193. ;
  194. ;type="radio" name="poweri" value="Ft-lb/sec" onClick = ""></font></TD>
  195. ;
  196. ;<td align="center" valign="top"><font size="1">Kcal/sec<br><input
  197. ;
  198. ;type="radio" name="poweri" value="Kcal/sec" onClick = ""></font></TD>
  199. ;
  200. ;<td align="center" valign="top"><font size="1">Btu/sec<br><input
  201. ;
  202. ;type="radio" name="poweri" value="Btu/sec" onClick = ""></font></TD></tr>
  203. ;
  204. ;<tr><td align="center"><font color="red" size="1"><b>To:</b></font></TD>
  205. ;
  206. ;<td align="center" valign="top"><font size="1">Hp<br><input
  207. ;
  208. ;type="radio" name="powero" value="Hp" onClick = ""></font></TD>
  209. ;
  210. ;<td align="center" valign="top"><font size="1">Metric Hp<br><input
  211. ;
  212. ;type="radio" name="powero" value="Metric Hp" onClick = ""></font></TD>
  213. ;
  214. ;<td align="center" valign="top"><font size="1">Kw<br><input
  215. ;
  216. ;type="radio" name="powero" value="Kw" onClick = ""></font></TD>
  217. ;
  218. ;<td align="center" valign="top"><font size="1">Poncelets<br><input
  219. ;
  220. ;type="radio" name="powero" value="Poncelets" onClick = ""></font></TD>
  221. ;
  222. ;<td align="center" valign="top"><font size="1">Kg-m/sec<br><input
  223. ;
  224. ;type="radio" name="powero" value="Kg-m/sec" onClick = ""></font></TD>
  225. ;
  226. ;<td align="center" valign="top"><font size="1">Ft-lb/sec<br><input
  227. ;
  228. ;type="radio" name="powero" value="Ft-lb/sec" checked onClick = ""></font></TD>
  229. ;
  230. ;<td align="center" valign="top"><font size="1">Kcal/sec<br><input
  231. ;
  232. ;type="radio" name="powero" value="Kcal/sec" onClick = ""></font></TD>
  233. ;
  234. ;<td align="center" valign="top"><font size="1">Btu/sec<br><input
  235. ;
  236. ;type="radio" name="powero" value="Btu/sec" onClick = ""></font></TD></tr>
  237. ;
  238. ;<tr><td colspan="9" valign="top"><font size="1"><input type="button"
  239. ;
  240. ;value=" Click for Conversion " onClick="powerCon();"><input 
  241. ;
  242. ;type="reset" value=" reset values "><input type="text" 
  243. ;
  244. ;name="powerout" size="30" VALUE="" onClick="powerCon();">
  245. ;
  246. ;</font></td></tr>
  247. ;
  248. ;</table></form>
  249. ;
  250. ;<p>
  251. ;
  252.  
  253.  
  254. [`Caption`]
  255. Kind=S
  256. Value=Power Equivalents
  257.  
  258.  
  259.